inherited FCadastroUsuarios: TFCadastroUsuarios
  Left = 235
  Top = 159
  Caption = 'Cadastro Usu'#225'rios'
  ClientHeight = 182
  ClientWidth = 487
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 487
    Height = 182
    object Label1: TLabel [0]
      Left = 8
      Top = 40
      Width = 33
      Height = 13
      Caption = 'Codigo'
    end
    object Label2: TLabel [1]
      Left = 56
      Top = 40
      Width = 28
      Height = 13
      Caption = 'Nome'
      FocusControl = DBENome
    end
    object DBText1: TDBText [2]
      Left = 8
      Top = 56
      Width = 41
      Height = 17
      DataField = 'USU_CODIGO'
      DataSource = DSCadastro
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel [3]
      Left = 56
      Top = 80
      Width = 73
      Height = 13
      Caption = 'Grupo Usu'#225'rios'
      FocusControl = DBENome
    end
    object Label4: TLabel [4]
      Left = 232
      Top = 40
      Width = 31
      Height = 13
      Caption = 'Senha'
      FocusControl = DBENome
    end
    object Label5: TLabel [5]
      Left = 299
      Top = 40
      Width = 75
      Height = 13
      Caption = 'Confirma Senha'
    end
    object Label6: TLabel [6]
      Left = 235
      Top = 80
      Width = 44
      Height = 13
      Caption = 'Professor'
      FocusControl = DBENome
    end
    inherited Panel2: TPanel
      Width = 485
      inherited BtnEditar: TBitBtn
        Left = 84
      end
      inherited BtnSalvar: TBitBtn
        Left = 244
      end
      inherited BtnCancelar: TBitBtn
        Left = 324
      end
      inherited BtnFechar: TBitBtn
        Left = 405
      end
      inherited BtnExcluir: TBitBtn
        Left = 164
      end
    end
    inherited Panel3: TPanel
      Top = 143
      Width = 485
      TabOrder = 3
      inherited SBAtualiza: TSpeedButton
        Left = 195
      end
      inherited LUsuario: TLabel
        Left = 315
      end
      inherited LDataMod: TLabel
        Left = 315
      end
      inherited DBNavigator1: TDBNavigator
        Left = 82
        Hints.Strings = ()
      end
    end
    object DBENome: TDBEdit
      Left = 56
      Top = 56
      Width = 174
      Height = 21
      CharCase = ecUpperCase
      DataField = 'USU_NOME'
      DataSource = DSCadastro
      TabOrder = 1
    end
    object DBLCBNivel: TDBLookupComboBox
      Left = 56
      Top = 96
      Width = 177
      Height = 21
      DataField = 'USU_NIVEL'
      DataSource = DSCadastro
      KeyField = 'NIV_CODIGO'
      ListField = 'NIV_NOME'
      ListSource = dsGrupoUsuario
      TabOrder = 2
      OnKeyDown = DBLCBNivelKeyDown
    end
    object ESenha: TEdit
      Left = 234
      Top = 56
      Width = 60
      Height = 21
      PasswordChar = '*'
      TabOrder = 4
    end
    object MESenha: TMaskEdit
      Left = 299
      Top = 56
      Width = 61
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 6
      PasswordChar = '*'
      TabOrder = 5
      OnExit = MESenhaExit
    end
    object dblProfessor: TDBLookupComboBox
      Left = 235
      Top = 96
      Width = 233
      Height = 21
      DataField = 'OIDPROFESSOR'
      DataSource = DSCadastro
      KeyField = 'OIDPROFESSOR'
      ListField = 'VCNOME'
      ListSource = dsProfessor
      TabOrder = 6
    end
  end
  inherited SQLCadastro: TSQLClientDataSet
    CommandText = 'select * from USUARIO '#13#10#13#10'Order By USU_CODIGO'
    DBConnection = DMGeral.SQLConnection
    Left = 127
    Top = 91
  end
  inherited DSCadastro: TDataSource
    Left = 164
    Top = 91
  end
  object SQLClientDataSet1: TSQLClientDataSet
    CommandText = 'select * from nivel'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    DBConnection = DMGeral.SQLConnection
    Left = 392
    Top = 104
  end
  object dsGrupoUsuario: TDataSource
    DataSet = SQLClientDataSet1
    OnDataChange = dsGrupoUsuarioDataChange
    Left = 424
    Top = 104
  end
  object dsProfessor: TDataSource
    DataSet = DMAcademico.SQLProfessor
    Left = 288
    Top = 104
  end
end
